代表工作簿中的图表。

说明

此图表既可以是嵌入的图表（包含在 ChartObject 对象中），也可以是单独的图表工作表。

示例部分中描述了以下用于返回 Chart 对象的属性和方法：

• Charts 方法
• ActiveChart 属性
• ActiveSheet 属性

示例

Charts 集合包含工作簿中每个图表工作表的 Chart 对象。使用 Charts( index) 可以返回单个 Chart 对象，其中 index 为图表工作表的索引号或名称。图表索引号表示图表工作表在工作簿标签栏上的位置。Charts(1) 是工作簿中第一个（最左边的）图表；Charts(Charts.Count) 是最后一个（最右边的）图表。所有图表工作表均包括在索引计数中，即便是隐藏工作表也是如此。图表工作表名称显示在图表工作簿标签上。您可以使用 Name 属性设置或返回图表名称。本示例将更改第一张图表工作表中第一个系列的颜色。

Charts.Item(1).SeriesCollection(1).Format.Fill.ForeColor.RGB = rgbRed

本示例将名为“Sales”的图表移至活动工作簿的尾部。

Charts.Item("Sales").Move(null,Sheets.Item(Sheets.Count))

Chart 对象也是 Sheets 集合的成员，此集合包含工作簿中的所有工作表（图表工作表和工作表）。使用 Sheets(index) 可以返回单个工作表，其中 index 是工作表索引号或名称。

当图表是活动对象时，您可以使用 ActiveChart 属性引用它。如果用户选择了图表工作表，或者用 Chart 对象的 Activate 方法或 ChartObject 对象的 Activate 方法激活了它，则该图表工作表处于活动状态。本示例将激活图表工作表 1，然后设置图表类型和名称。

Charts.Item(1).Activate()
let chart = ActiveChart
    chart.Type = xlLine
    chart.HasTitle = true
    chart.ChartTitle.Text = "January Sales"

如果用户选择了嵌入图表，或者用 Activate 方法激活了包含该嵌入图表的 ChartObject 对象，则该嵌入图表处于活动状态。本示例将激活工作表 1 上的嵌入图表 1，然后设置图表类型和名称。请注意，在激活了嵌入图表之后，本示例中的代码与前一个示例中的代码相同。通过使用 ActiveChart 属性，您可以编写能够引用嵌入图表或图表工作表（视哪一个处于活动状态而定）的 Visual Basic 代码。

Worksheets.Item(1).ChartObjects(1).Activate()
ActiveChart.ChartType = xlLine
ActiveChart.HasTitle = true
ActiveChart.ChartTitle.Text = "January Sales"

当图表工作表为活动工作表时，可以使用 ActiveSheet 属性来引用它。本示例使用 Activate 方法激活名为 Chart1 的图表工作表，然后将图表中系列 1 的内部颜色设置为蓝色。

Charts.Item("chart1").Activate()
ActiveSheet.SeriesCollection(1).Format.Fill.ForeColor.RGB = rgbBlue